home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / programming / e / powerd0.06 / modules / intuition / screens.m < prev    next >
Text File  |  1999-11-30  |  4KB  |  202 lines

  1. MODULE    'exec/nodes',
  2.             'exec/tasks',
  3.             'graphics/clip',
  4.             'graphics/gfx',
  5.             'graphics/layers',
  6.             'graphics/rastport',
  7.             'graphics/text',
  8.             'graphics/view',
  9.             'intuition/intuition',
  10.             'utility/tagitem'
  11.  
  12. CONST    DRI_VERSION=2
  13.  
  14. OBJECT DrawInfo
  15.     Version:UWORD,
  16.     NumPens:UWORD,
  17.     Pens:PTR TO UWORD,
  18.     Font:PTR TO TextFont,
  19.     Depth:UWORD,
  20.     ResolutionX:UWORD,
  21.     ResolutionY:UWORD,
  22.     Flags:LONG,
  23.     CheckMark:PTR TO Image,
  24.     AmigaKey:PTR TO Image,
  25.     LongReserved[5]:LONG
  26.  
  27. CONST    DRIF_NEWLOOK=1,
  28.         DRIB_NEWLOOK=0,
  29.         DETAILPEN=0,
  30.         BLOCKPEN=1,
  31.         TEXTPEN=2,
  32.         SHINEPEN=3,
  33.         SHADOWPEN=4,
  34.         FILLPEN=5,
  35.         FILLTEXTPEN=6,
  36.         BACKGROUNDPEN=7,
  37.         HIGHLIGHTTEXTPEN=8,
  38.         BARDETAILPEN=9,
  39.         BARBLOCKPEN=10,
  40.         BARTRIMPEN=11,
  41.         NUMDRIPENS=12,
  42.         PEN_C3=$FEFC,
  43.         PEN_C2=$FEFD,
  44.         PEN_C1=$FEFE,
  45.         PEN_C0=$FEFF
  46.  
  47. OBJECT Screen
  48.     NextScreen:PTR TO Screen,
  49.     FirstWindow:PTR TO Window,
  50.     LeftEdge:INT,
  51.     TopEdge:INT,
  52.     Width:INT,
  53.     Height:INT,
  54.     MouseY:INT,
  55.     MouseX:INT,
  56.     Flags:UWORD,
  57.     Title:PTR TO CHAR,
  58.     DefaultTitle:PTR TO CHAR,
  59.     BarHeight:UBYTE,
  60.     BarVBorder:UBYTE,
  61.     BarHBorder:UBYTE,
  62.     MenuVBorder:UBYTE,
  63.     MenuHBorder:UBYTE,
  64.     WBorTop:UBYTE,
  65.     WBorLeft:UBYTE,
  66.     WBorRight:UBYTE,
  67.     WBorBottom:UBYTE,
  68.     KludgeFill00:BYTE,            // this will be removed in future
  69.     Font:PTR TO TextAttr,
  70.     ViewPort:ViewPort,
  71.     RastPort:RastPort,
  72.     BitMap:BitMap,
  73.     LayerInfo:Layer_Info,
  74.     FirstGadget:PTR TO Gadget,
  75.     DetailPen:CHAR,
  76.     BlockPen:CHAR,
  77.     SaveColor0:UWORD,
  78.     BarLayer:PTR TO Layer,
  79.     ExtData:PTR TO CHAR,
  80.     UserData:PTR TO CHAR
  81.  
  82. CONST    SCREENTYPE=15,
  83.         WBENCHSCREEN=1,
  84.         PUBLICSCREEN=2,
  85.         CUSTOMSCREEN=15,
  86.         SHOWTITLE=16,
  87.         BEEPING=$20,
  88.         CUSTOMBITMAP=$40,
  89.         SCREENBEHIND=$80,
  90.         SCREENQUIET=$100,
  91.         SCREENHIRES=$200,
  92.         STDSCREENHEIGHT=-1,
  93.         STDSCREENWIDTH=-1,
  94.         NS_EXTENDED=$1000,
  95.         AUTOSCROLL=$4000,
  96.         PENSHARED=$400,
  97.         SA_Dummy=$80000020,
  98.         SA_Left=$80000021,
  99.         SA_Top=$80000022,
  100.         SA_Width=$80000023,
  101.         SA_Height=$80000024,
  102.         SA_Depth=$80000025,
  103.         SA_DetailPen=$80000026,
  104.         SA_BlockPen=$80000027,
  105.         SA_Title=$80000028,
  106.         SA_Colors=$80000029,
  107.         SA_ErrorCode=$8000002A,
  108.         SA_Font=$8000002B,
  109.         SA_SysFont=$8000002C,
  110.         SA_Type=$8000002D,
  111.         SA_BitMap=$8000002E,
  112.         SA_PubName=$8000002F,
  113.         SA_PubSig=$80000030,
  114.         SA_PubTask=$80000031,
  115.         SA_DisplayID=$80000032,
  116.         SA_DClip=$80000033,
  117.         SA_Overscan=$80000034,
  118.         SA_Obsolete1=$80000035,
  119.         SA_ShowTitle=$80000036,
  120.         SA_Behind=$80000037,
  121.         SA_Quiet=$80000038,
  122.         SA_AutoScroll=$80000039,
  123.         SA_Pens=$8000003A,
  124.         SA_FullPalette=$8000003B,
  125.         SA_ColorMapEntries=$8000003C,
  126.         SA_Parent=$8000003D,
  127.         SA_Draggable=$8000003E,
  128.         SA_Exclusive=$8000003F,
  129.         SA_SharePens=$80000040,
  130.         SA_BackFill=$80000041,
  131.         SA_Interleaved=$80000042,
  132.         SA_Colors32=$80000043,
  133.         SA_VideoControl=$80000044,
  134.         SA_FrontChild=$80000045,
  135.         SA_BackChild=$80000046,
  136.         SA_LikeWorkbench=$80000047,
  137.         SA_Reserved=$80000048,
  138.         SA_MinimizeISG=$80000049
  139.  
  140. ENUM    OSERR_NOMONITOR=1,
  141.         OSERR_NOCHIPS,
  142.         OSERR_NOMEM,
  143.         OSERR_NOCHIPMEM,
  144.         OSERR_PUBNOTUNIQUE,
  145.         OSERR_UNKNOWNMODE,
  146.         OSERR_TOODEEP,
  147.         OSERR_ATTACHFAIL,
  148.         OSERR_NOTAVAILABLE
  149.  
  150. OBJECT NS
  151.     LeftEdge:INT,
  152.     TopEdge:INT,
  153.     Width:INT,
  154.     Height:INT,
  155.     Depth:INT,
  156.     DetailPen:CHAR,
  157.     BlockPen:CHAR,
  158.     ViewModes:UWORD,
  159.     Type:UWORD,
  160.     Font:PTR TO TextAttr,
  161.     DefaultTitle:PTR TO CHAR,
  162.     Gadgets:PTR TO Gadget,
  163.     Custombitmap:PTR TO BitMap
  164.  
  165. OBJECT ExtNewScreen OF NS
  166.     Extension:PTR TO TagItem
  167.  
  168. ENUM    OSCAN_TEXT=1,
  169.         OSCAN_STANDARD,
  170.         OSCAN_MAX,
  171.         OSCAN_VIDEO
  172.  
  173. OBJECT PubScreenNode
  174.     LN:LN,
  175.     Screen:PTR TO Screen,
  176.     Flags:UWORD,
  177.     Size:INT,
  178.     VisitorCount:INT,
  179.     SigTask:PTR TO TC,
  180.     SigBit:CHAR,
  181.     Pad1:CHAR
  182.  
  183. CONST    PSNF_PRIVATE=1,
  184.         MAXPUBSCREENNAME=$8B,
  185.         SHANGHAI=1,
  186.         POPPUBSCREEN=2,
  187.         SDEPTH_TOFRONT=0,
  188.         SDEPTH_TOBACK=1,
  189.         SDEPTH_INFAMILY=2,
  190.         SDEPTH_CHILDONLY=2,
  191.         SPOS_RELATIVE=0,
  192.         SPOS_ABSOLUTE=1,
  193.         SPOS_MAKEVISIBLE=2,
  194.         SPOS_FORCEDRAG=4
  195.  
  196. OBJECT ScreenBuffer
  197.     BitMap:PTR TO BitMap,
  198.     DBufInfo:PTR TO DBufInfo
  199.  
  200. ENUM    SB_SCREEN_BITMAP=1,
  201.         SB_COPY_BITMAP
  202.